function meanShape = getProcrusteMeanShape(allpreShape)
[x pointPerShape numOfShape] = size(allpreShape);
meanShape = zeros(x, pointPerShape);
for i=1:pointPerShape
    pointSum = [sum(allpreShape(1,i,:)) sum(allpreShape(2,i,:))]';
    meanShape(:,i) =  pointSum/numOfShape;
end
    

